/*
ID:ning yusui
LANG:C++
TASK:butter
*/
#include <iostream>
#include <string.h>
#include<cstdio>
#include<cstdlib>
using namespace std;
int eq[801],a[801][801],dis[801];
int farm[501];
int n,p,c;
short v[801];
int l[801][101];
int ans;
void spfa(int s)
{
	int h=0,r=1;
	eq[r]=s;
	v[s]=true;
	int now,st,u;
	do
	{
		h++;
		st=eq[(h-1)%p+1];
		for(int i=1;i<=l[st][0];i++)
		{
			u=l[st][i];
			if(dis[st]+a[st][u]<dis[u])
			{
				dis[u]=dis[st]+a[st][u];
				if(!v[u])
				{
					r++;
					eq[(r-1)%p +1]=u;
					v[u]=true;
				}
			}
		}
		v[st]=false;
	}while(h<r);
	now=0;
	for(int i=1;i<=n;i++)
		now+=dis[farm[i]];
	if(ans>now)
		ans=now;
}
main()
{
	freopen("butter.in","r",stdin);
	freopen("butter.out","w",stdout);
	ans=0x7FFFFFFF;
	cin>>n>>p>>c;
	for(int i=1;i<=n;i++)
		cin>>farm[i];
	int x,y,z;
	for(int i=1;i<=c;i++)
	{
		cin>>x>>y>>z;
		l[x][0]++;
		l[x][l[x][0]]=y;
		a[x][y]=z;
		l[y][0]++;
		l[y][l[y][0]]=x;
		a[y][x]=z;
	}
	for(int i=1;i<=p;i++)
	{
		memset(dis,0x7F,sizeof(dis));
		memset(v,0,sizeof(v));
		dis[i]=0;
		spfa(i);
	}
	cout<<ans<<endl;
	return 0;
}